3.7.18 \(\int (d+e x^2)^3 (a+b \arcsin (c x)) \, dx\) [618]

3.7.18.1 Optimal result
3.7.18.2 Mathematica [A] (verified)
3.7.18.3 Rubi [A] (verified)
3.7.18.4 Maple [A] (verified)
3.7.18.5 Fricas [A] (verification not implemented)
3.7.18.6 Sympy [A] (verification not implemented)
3.7.18.7 Maxima [A] (verification not implemented)
3.7.18.8 Giac [B] (verification not implemented)
3.7.18.9 Mupad [F(-1)]

3.7.18.1 Optimal result

Integrand size = 18, antiderivative size = 225 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\frac {b \left (35 c^6 d^3+35 c^4 d^2 e+21 c^2 d e^2+5 e^3\right ) \sqrt {1-c^2 x^2}}{35 c^7}-\frac {b e \left (35 c^4 d^2+42 c^2 d e+15 e^2\right ) \left (1-c^2 x^2\right )^{3/2}}{105 c^7}+\frac {3 b e^2 \left (7 c^2 d+5 e\right ) \left (1-c^2 x^2\right )^{5/2}}{175 c^7}-\frac {b e^3 \left (1-c^2 x^2\right )^{7/2}}{49 c^7}+d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x)) \]

output
-1/105*b*e*(35*c^4*d^2+42*c^2*d*e+15*e^2)*(-c^2*x^2+1)^(3/2)/c^7+3/175*b*e 
^2*(7*c^2*d+5*e)*(-c^2*x^2+1)^(5/2)/c^7-1/49*b*e^3*(-c^2*x^2+1)^(7/2)/c^7+ 
d^3*x*(a+b*arcsin(c*x))+d^2*e*x^3*(a+b*arcsin(c*x))+3/5*d*e^2*x^5*(a+b*arc 
sin(c*x))+1/7*e^3*x^7*(a+b*arcsin(c*x))+1/35*b*(35*c^6*d^3+35*c^4*d^2*e+21 
*c^2*d*e^2+5*e^3)*(-c^2*x^2+1)^(1/2)/c^7
 
3.7.18.2 Mathematica [A] (verified)

Time = 0.17 (sec) , antiderivative size = 187, normalized size of antiderivative = 0.83 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\frac {105 a x \left (35 d^3+35 d^2 e x^2+21 d e^2 x^4+5 e^3 x^6\right )+\frac {b \sqrt {1-c^2 x^2} \left (240 e^3+24 c^2 e^2 \left (49 d+5 e x^2\right )+2 c^4 e \left (1225 d^2+294 d e x^2+45 e^2 x^4\right )+c^6 \left (3675 d^3+1225 d^2 e x^2+441 d e^2 x^4+75 e^3 x^6\right )\right )}{c^7}+105 b x \left (35 d^3+35 d^2 e x^2+21 d e^2 x^4+5 e^3 x^6\right ) \arcsin (c x)}{3675} \]

input
Integrate[(d + e*x^2)^3*(a + b*ArcSin[c*x]),x]
 
output
(105*a*x*(35*d^3 + 35*d^2*e*x^2 + 21*d*e^2*x^4 + 5*e^3*x^6) + (b*Sqrt[1 - 
c^2*x^2]*(240*e^3 + 24*c^2*e^2*(49*d + 5*e*x^2) + 2*c^4*e*(1225*d^2 + 294* 
d*e*x^2 + 45*e^2*x^4) + c^6*(3675*d^3 + 1225*d^2*e*x^2 + 441*d*e^2*x^4 + 7 
5*e^3*x^6)))/c^7 + 105*b*x*(35*d^3 + 35*d^2*e*x^2 + 21*d*e^2*x^4 + 5*e^3*x 
^6)*ArcSin[c*x])/3675
 
3.7.18.3 Rubi [A] (verified)

Time = 0.54 (sec) , antiderivative size = 226, normalized size of antiderivative = 1.00, number of steps used = 6, number of rules used = 5, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.278, Rules used = {5170, 27, 2331, 2389, 2009}

Below are the steps used by Rubi to obtain the solution. The rule number used for the transformation is given above next to the arrow. The rules definitions used are listed below.

\(\displaystyle \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx\)

\(\Big \downarrow \) 5170

\(\displaystyle -b c \int \frac {x \left (5 e^3 x^6+21 d e^2 x^4+35 d^2 e x^2+35 d^3\right )}{35 \sqrt {1-c^2 x^2}}dx+d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x))\)

\(\Big \downarrow \) 27

\(\displaystyle -\frac {1}{35} b c \int \frac {x \left (5 e^3 x^6+21 d e^2 x^4+35 d^2 e x^2+35 d^3\right )}{\sqrt {1-c^2 x^2}}dx+d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x))\)

\(\Big \downarrow \) 2331

\(\displaystyle -\frac {1}{70} b c \int \frac {5 e^3 x^6+21 d e^2 x^4+35 d^2 e x^2+35 d^3}{\sqrt {1-c^2 x^2}}dx^2+d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x))\)

\(\Big \downarrow \) 2389

\(\displaystyle -\frac {1}{70} b c \int \left (-\frac {5 \left (1-c^2 x^2\right )^{5/2} e^3}{c^6}+\frac {3 \left (7 d c^2+5 e\right ) \left (1-c^2 x^2\right )^{3/2} e^2}{c^6}-\frac {\left (35 d^2 c^4+42 d e c^2+15 e^2\right ) \sqrt {1-c^2 x^2} e}{c^6}+\frac {35 d^3 c^6+35 d^2 e c^4+21 d e^2 c^2+5 e^3}{c^6 \sqrt {1-c^2 x^2}}\right )dx^2+d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x))\)

\(\Big \downarrow \) 2009

\(\displaystyle d^3 x (a+b \arcsin (c x))+d^2 e x^3 (a+b \arcsin (c x))+\frac {3}{5} d e^2 x^5 (a+b \arcsin (c x))+\frac {1}{7} e^3 x^7 (a+b \arcsin (c x))-\frac {1}{70} b c \left (-\frac {6 e^2 \left (1-c^2 x^2\right )^{5/2} \left (7 c^2 d+5 e\right )}{5 c^8}+\frac {10 e^3 \left (1-c^2 x^2\right )^{7/2}}{7 c^8}+\frac {2 e \left (1-c^2 x^2\right )^{3/2} \left (35 c^4 d^2+42 c^2 d e+15 e^2\right )}{3 c^8}-\frac {2 \sqrt {1-c^2 x^2} \left (35 c^6 d^3+35 c^4 d^2 e+21 c^2 d e^2+5 e^3\right )}{c^8}\right )\)

input
Int[(d + e*x^2)^3*(a + b*ArcSin[c*x]),x]
 
output
-1/70*(b*c*((-2*(35*c^6*d^3 + 35*c^4*d^2*e + 21*c^2*d*e^2 + 5*e^3)*Sqrt[1 
- c^2*x^2])/c^8 + (2*e*(35*c^4*d^2 + 42*c^2*d*e + 15*e^2)*(1 - c^2*x^2)^(3 
/2))/(3*c^8) - (6*e^2*(7*c^2*d + 5*e)*(1 - c^2*x^2)^(5/2))/(5*c^8) + (10*e 
^3*(1 - c^2*x^2)^(7/2))/(7*c^8))) + d^3*x*(a + b*ArcSin[c*x]) + d^2*e*x^3* 
(a + b*ArcSin[c*x]) + (3*d*e^2*x^5*(a + b*ArcSin[c*x]))/5 + (e^3*x^7*(a + 
b*ArcSin[c*x]))/7
 

3.7.18.3.1 Defintions of rubi rules used

rule 27
Int[(a_)*(Fx_), x_Symbol] :> Simp[a   Int[Fx, x], x] /; FreeQ[a, x] &&  !Ma 
tchQ[Fx, (b_)*(Gx_) /; FreeQ[b, x]]
 

rule 2009
Int[u_, x_Symbol] :> Simp[IntSum[u, x], x] /; SumQ[u]
 

rule 2331
Int[(Pq_)*(x_)^(m_.)*((a_) + (b_.)*(x_)^2)^(p_.), x_Symbol] :> Simp[1/2   S 
ubst[Int[x^((m - 1)/2)*SubstFor[x^2, Pq, x]*(a + b*x)^p, x], x, x^2], x] /; 
 FreeQ[{a, b, p}, x] && PolyQ[Pq, x^2] && IntegerQ[(m - 1)/2]
 

rule 2389
Int[(Pq_)*((a_) + (b_.)*(x_)^(n_.))^(p_.), x_Symbol] :> Int[ExpandIntegrand 
[Pq*(a + b*x^n)^p, x], x] /; FreeQ[{a, b, n}, x] && PolyQ[Pq, x] && (IGtQ[p 
, 0] || EqQ[n, 1])
 

rule 5170
Int[((a_.) + ArcSin[(c_.)*(x_)]*(b_.))*((d_) + (e_.)*(x_)^2)^(p_.), x_Symbo 
l] :> With[{u = IntHide[(d + e*x^2)^p, x]}, Simp[(a + b*ArcSin[c*x])   u, x 
] - Simp[b*c   Int[SimplifyIntegrand[u/Sqrt[1 - c^2*x^2], x], x], x]] /; Fr 
eeQ[{a, b, c, d, e}, x] && NeQ[c^2*d + e, 0] && (IGtQ[p, 0] || ILtQ[p + 1/2 
, 0])
 
3.7.18.4 Maple [A] (verified)

Time = 0.20 (sec) , antiderivative size = 305, normalized size of antiderivative = 1.36

method result size
parts \(a \left (\frac {1}{7} e^{3} x^{7}+\frac {3}{5} d \,e^{2} x^{5}+d^{2} e \,x^{3}+d^{3} x \right )+\frac {b \left (\frac {c \arcsin \left (c x \right ) e^{3} x^{7}}{7}+\frac {3 c \arcsin \left (c x \right ) d \,e^{2} x^{5}}{5}+c \arcsin \left (c x \right ) d^{2} e \,x^{3}+\arcsin \left (c x \right ) d^{3} c x -\frac {5 e^{3} \left (-\frac {c^{6} x^{6} \sqrt {-c^{2} x^{2}+1}}{7}-\frac {6 c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {8 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {16 \sqrt {-c^{2} x^{2}+1}}{35}\right )-35 d^{3} c^{6} \sqrt {-c^{2} x^{2}+1}+21 d \,c^{2} e^{2} \left (-\frac {c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{5}-\frac {4 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{15}-\frac {8 \sqrt {-c^{2} x^{2}+1}}{15}\right )+35 d^{2} c^{4} e \left (-\frac {c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{3}-\frac {2 \sqrt {-c^{2} x^{2}+1}}{3}\right )}{35 c^{6}}\right )}{c}\) \(305\)
derivativedivides \(\frac {\frac {a \left (d^{3} c^{7} x +d^{2} c^{7} e \,x^{3}+\frac {3}{5} d \,c^{7} e^{2} x^{5}+\frac {1}{7} e^{3} c^{7} x^{7}\right )}{c^{6}}+\frac {b \left (\arcsin \left (c x \right ) d^{3} c^{7} x +\arcsin \left (c x \right ) d^{2} c^{7} e \,x^{3}+\frac {3 \arcsin \left (c x \right ) d \,c^{7} e^{2} x^{5}}{5}+\frac {\arcsin \left (c x \right ) e^{3} c^{7} x^{7}}{7}-\frac {e^{3} \left (-\frac {c^{6} x^{6} \sqrt {-c^{2} x^{2}+1}}{7}-\frac {6 c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {8 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {16 \sqrt {-c^{2} x^{2}+1}}{35}\right )}{7}+d^{3} c^{6} \sqrt {-c^{2} x^{2}+1}-d^{2} c^{4} e \left (-\frac {c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{3}-\frac {2 \sqrt {-c^{2} x^{2}+1}}{3}\right )-\frac {3 d \,c^{2} e^{2} \left (-\frac {c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{5}-\frac {4 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{15}-\frac {8 \sqrt {-c^{2} x^{2}+1}}{15}\right )}{5}\right )}{c^{6}}}{c}\) \(325\)
default \(\frac {\frac {a \left (d^{3} c^{7} x +d^{2} c^{7} e \,x^{3}+\frac {3}{5} d \,c^{7} e^{2} x^{5}+\frac {1}{7} e^{3} c^{7} x^{7}\right )}{c^{6}}+\frac {b \left (\arcsin \left (c x \right ) d^{3} c^{7} x +\arcsin \left (c x \right ) d^{2} c^{7} e \,x^{3}+\frac {3 \arcsin \left (c x \right ) d \,c^{7} e^{2} x^{5}}{5}+\frac {\arcsin \left (c x \right ) e^{3} c^{7} x^{7}}{7}-\frac {e^{3} \left (-\frac {c^{6} x^{6} \sqrt {-c^{2} x^{2}+1}}{7}-\frac {6 c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {8 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{35}-\frac {16 \sqrt {-c^{2} x^{2}+1}}{35}\right )}{7}+d^{3} c^{6} \sqrt {-c^{2} x^{2}+1}-d^{2} c^{4} e \left (-\frac {c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{3}-\frac {2 \sqrt {-c^{2} x^{2}+1}}{3}\right )-\frac {3 d \,c^{2} e^{2} \left (-\frac {c^{4} x^{4} \sqrt {-c^{2} x^{2}+1}}{5}-\frac {4 c^{2} x^{2} \sqrt {-c^{2} x^{2}+1}}{15}-\frac {8 \sqrt {-c^{2} x^{2}+1}}{15}\right )}{5}\right )}{c^{6}}}{c}\) \(325\)

input
int((e*x^2+d)^3*(a+b*arcsin(c*x)),x,method=_RETURNVERBOSE)
 
output
a*(1/7*e^3*x^7+3/5*d*e^2*x^5+d^2*e*x^3+d^3*x)+b/c*(1/7*c*arcsin(c*x)*e^3*x 
^7+3/5*c*arcsin(c*x)*d*e^2*x^5+c*arcsin(c*x)*d^2*e*x^3+arcsin(c*x)*d^3*c*x 
-1/35/c^6*(5*e^3*(-1/7*c^6*x^6*(-c^2*x^2+1)^(1/2)-6/35*c^4*x^4*(-c^2*x^2+1 
)^(1/2)-8/35*c^2*x^2*(-c^2*x^2+1)^(1/2)-16/35*(-c^2*x^2+1)^(1/2))-35*d^3*c 
^6*(-c^2*x^2+1)^(1/2)+21*d*c^2*e^2*(-1/5*c^4*x^4*(-c^2*x^2+1)^(1/2)-4/15*c 
^2*x^2*(-c^2*x^2+1)^(1/2)-8/15*(-c^2*x^2+1)^(1/2))+35*d^2*c^4*e*(-1/3*c^2* 
x^2*(-c^2*x^2+1)^(1/2)-2/3*(-c^2*x^2+1)^(1/2))))
 
3.7.18.5 Fricas [A] (verification not implemented)

Time = 0.26 (sec) , antiderivative size = 229, normalized size of antiderivative = 1.02 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\frac {525 \, a c^{7} e^{3} x^{7} + 2205 \, a c^{7} d e^{2} x^{5} + 3675 \, a c^{7} d^{2} e x^{3} + 3675 \, a c^{7} d^{3} x + 105 \, {\left (5 \, b c^{7} e^{3} x^{7} + 21 \, b c^{7} d e^{2} x^{5} + 35 \, b c^{7} d^{2} e x^{3} + 35 \, b c^{7} d^{3} x\right )} \arcsin \left (c x\right ) + {\left (75 \, b c^{6} e^{3} x^{6} + 3675 \, b c^{6} d^{3} + 2450 \, b c^{4} d^{2} e + 1176 \, b c^{2} d e^{2} + 9 \, {\left (49 \, b c^{6} d e^{2} + 10 \, b c^{4} e^{3}\right )} x^{4} + 240 \, b e^{3} + {\left (1225 \, b c^{6} d^{2} e + 588 \, b c^{4} d e^{2} + 120 \, b c^{2} e^{3}\right )} x^{2}\right )} \sqrt {-c^{2} x^{2} + 1}}{3675 \, c^{7}} \]

input
integrate((e*x^2+d)^3*(a+b*arcsin(c*x)),x, algorithm="fricas")
 
output
1/3675*(525*a*c^7*e^3*x^7 + 2205*a*c^7*d*e^2*x^5 + 3675*a*c^7*d^2*e*x^3 + 
3675*a*c^7*d^3*x + 105*(5*b*c^7*e^3*x^7 + 21*b*c^7*d*e^2*x^5 + 35*b*c^7*d^ 
2*e*x^3 + 35*b*c^7*d^3*x)*arcsin(c*x) + (75*b*c^6*e^3*x^6 + 3675*b*c^6*d^3 
 + 2450*b*c^4*d^2*e + 1176*b*c^2*d*e^2 + 9*(49*b*c^6*d*e^2 + 10*b*c^4*e^3) 
*x^4 + 240*b*e^3 + (1225*b*c^6*d^2*e + 588*b*c^4*d*e^2 + 120*b*c^2*e^3)*x^ 
2)*sqrt(-c^2*x^2 + 1))/c^7
 
3.7.18.6 Sympy [A] (verification not implemented)

Time = 0.67 (sec) , antiderivative size = 389, normalized size of antiderivative = 1.73 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\begin {cases} a d^{3} x + a d^{2} e x^{3} + \frac {3 a d e^{2} x^{5}}{5} + \frac {a e^{3} x^{7}}{7} + b d^{3} x \operatorname {asin}{\left (c x \right )} + b d^{2} e x^{3} \operatorname {asin}{\left (c x \right )} + \frac {3 b d e^{2} x^{5} \operatorname {asin}{\left (c x \right )}}{5} + \frac {b e^{3} x^{7} \operatorname {asin}{\left (c x \right )}}{7} + \frac {b d^{3} \sqrt {- c^{2} x^{2} + 1}}{c} + \frac {b d^{2} e x^{2} \sqrt {- c^{2} x^{2} + 1}}{3 c} + \frac {3 b d e^{2} x^{4} \sqrt {- c^{2} x^{2} + 1}}{25 c} + \frac {b e^{3} x^{6} \sqrt {- c^{2} x^{2} + 1}}{49 c} + \frac {2 b d^{2} e \sqrt {- c^{2} x^{2} + 1}}{3 c^{3}} + \frac {4 b d e^{2} x^{2} \sqrt {- c^{2} x^{2} + 1}}{25 c^{3}} + \frac {6 b e^{3} x^{4} \sqrt {- c^{2} x^{2} + 1}}{245 c^{3}} + \frac {8 b d e^{2} \sqrt {- c^{2} x^{2} + 1}}{25 c^{5}} + \frac {8 b e^{3} x^{2} \sqrt {- c^{2} x^{2} + 1}}{245 c^{5}} + \frac {16 b e^{3} \sqrt {- c^{2} x^{2} + 1}}{245 c^{7}} & \text {for}\: c \neq 0 \\a \left (d^{3} x + d^{2} e x^{3} + \frac {3 d e^{2} x^{5}}{5} + \frac {e^{3} x^{7}}{7}\right ) & \text {otherwise} \end {cases} \]

input
integrate((e*x**2+d)**3*(a+b*asin(c*x)),x)
 
output
Piecewise((a*d**3*x + a*d**2*e*x**3 + 3*a*d*e**2*x**5/5 + a*e**3*x**7/7 + 
b*d**3*x*asin(c*x) + b*d**2*e*x**3*asin(c*x) + 3*b*d*e**2*x**5*asin(c*x)/5 
 + b*e**3*x**7*asin(c*x)/7 + b*d**3*sqrt(-c**2*x**2 + 1)/c + b*d**2*e*x**2 
*sqrt(-c**2*x**2 + 1)/(3*c) + 3*b*d*e**2*x**4*sqrt(-c**2*x**2 + 1)/(25*c) 
+ b*e**3*x**6*sqrt(-c**2*x**2 + 1)/(49*c) + 2*b*d**2*e*sqrt(-c**2*x**2 + 1 
)/(3*c**3) + 4*b*d*e**2*x**2*sqrt(-c**2*x**2 + 1)/(25*c**3) + 6*b*e**3*x** 
4*sqrt(-c**2*x**2 + 1)/(245*c**3) + 8*b*d*e**2*sqrt(-c**2*x**2 + 1)/(25*c* 
*5) + 8*b*e**3*x**2*sqrt(-c**2*x**2 + 1)/(245*c**5) + 16*b*e**3*sqrt(-c**2 
*x**2 + 1)/(245*c**7), Ne(c, 0)), (a*(d**3*x + d**2*e*x**3 + 3*d*e**2*x**5 
/5 + e**3*x**7/7), True))
 
3.7.18.7 Maxima [A] (verification not implemented)

Time = 0.28 (sec) , antiderivative size = 292, normalized size of antiderivative = 1.30 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\frac {1}{7} \, a e^{3} x^{7} + \frac {3}{5} \, a d e^{2} x^{5} + a d^{2} e x^{3} + \frac {1}{3} \, {\left (3 \, x^{3} \arcsin \left (c x\right ) + c {\left (\frac {\sqrt {-c^{2} x^{2} + 1} x^{2}}{c^{2}} + \frac {2 \, \sqrt {-c^{2} x^{2} + 1}}{c^{4}}\right )}\right )} b d^{2} e + \frac {1}{25} \, {\left (15 \, x^{5} \arcsin \left (c x\right ) + {\left (\frac {3 \, \sqrt {-c^{2} x^{2} + 1} x^{4}}{c^{2}} + \frac {4 \, \sqrt {-c^{2} x^{2} + 1} x^{2}}{c^{4}} + \frac {8 \, \sqrt {-c^{2} x^{2} + 1}}{c^{6}}\right )} c\right )} b d e^{2} + \frac {1}{245} \, {\left (35 \, x^{7} \arcsin \left (c x\right ) + {\left (\frac {5 \, \sqrt {-c^{2} x^{2} + 1} x^{6}}{c^{2}} + \frac {6 \, \sqrt {-c^{2} x^{2} + 1} x^{4}}{c^{4}} + \frac {8 \, \sqrt {-c^{2} x^{2} + 1} x^{2}}{c^{6}} + \frac {16 \, \sqrt {-c^{2} x^{2} + 1}}{c^{8}}\right )} c\right )} b e^{3} + a d^{3} x + \frac {{\left (c x \arcsin \left (c x\right ) + \sqrt {-c^{2} x^{2} + 1}\right )} b d^{3}}{c} \]

input
integrate((e*x^2+d)^3*(a+b*arcsin(c*x)),x, algorithm="maxima")
 
output
1/7*a*e^3*x^7 + 3/5*a*d*e^2*x^5 + a*d^2*e*x^3 + 1/3*(3*x^3*arcsin(c*x) + c 
*(sqrt(-c^2*x^2 + 1)*x^2/c^2 + 2*sqrt(-c^2*x^2 + 1)/c^4))*b*d^2*e + 1/25*( 
15*x^5*arcsin(c*x) + (3*sqrt(-c^2*x^2 + 1)*x^4/c^2 + 4*sqrt(-c^2*x^2 + 1)* 
x^2/c^4 + 8*sqrt(-c^2*x^2 + 1)/c^6)*c)*b*d*e^2 + 1/245*(35*x^7*arcsin(c*x) 
 + (5*sqrt(-c^2*x^2 + 1)*x^6/c^2 + 6*sqrt(-c^2*x^2 + 1)*x^4/c^4 + 8*sqrt(- 
c^2*x^2 + 1)*x^2/c^6 + 16*sqrt(-c^2*x^2 + 1)/c^8)*c)*b*e^3 + a*d^3*x + (c* 
x*arcsin(c*x) + sqrt(-c^2*x^2 + 1))*b*d^3/c
 
3.7.18.8 Giac [B] (verification not implemented)

Leaf count of result is larger than twice the leaf count of optimal. 480 vs. \(2 (205) = 410\).

Time = 0.32 (sec) , antiderivative size = 480, normalized size of antiderivative = 2.13 \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\frac {1}{7} \, a e^{3} x^{7} + \frac {3}{5} \, a d e^{2} x^{5} + a d^{2} e x^{3} + b d^{3} x \arcsin \left (c x\right ) + a d^{3} x + \frac {{\left (c^{2} x^{2} - 1\right )} b d^{2} e x \arcsin \left (c x\right )}{c^{2}} + \frac {b d^{2} e x \arcsin \left (c x\right )}{c^{2}} + \frac {3 \, {\left (c^{2} x^{2} - 1\right )}^{2} b d e^{2} x \arcsin \left (c x\right )}{5 \, c^{4}} + \frac {\sqrt {-c^{2} x^{2} + 1} b d^{3}}{c} + \frac {6 \, {\left (c^{2} x^{2} - 1\right )} b d e^{2} x \arcsin \left (c x\right )}{5 \, c^{4}} + \frac {{\left (c^{2} x^{2} - 1\right )}^{3} b e^{3} x \arcsin \left (c x\right )}{7 \, c^{6}} - \frac {{\left (-c^{2} x^{2} + 1\right )}^{\frac {3}{2}} b d^{2} e}{3 \, c^{3}} + \frac {3 \, b d e^{2} x \arcsin \left (c x\right )}{5 \, c^{4}} + \frac {3 \, {\left (c^{2} x^{2} - 1\right )}^{2} b e^{3} x \arcsin \left (c x\right )}{7 \, c^{6}} + \frac {\sqrt {-c^{2} x^{2} + 1} b d^{2} e}{c^{3}} + \frac {3 \, {\left (c^{2} x^{2} - 1\right )}^{2} \sqrt {-c^{2} x^{2} + 1} b d e^{2}}{25 \, c^{5}} + \frac {3 \, {\left (c^{2} x^{2} - 1\right )} b e^{3} x \arcsin \left (c x\right )}{7 \, c^{6}} - \frac {2 \, {\left (-c^{2} x^{2} + 1\right )}^{\frac {3}{2}} b d e^{2}}{5 \, c^{5}} + \frac {{\left (c^{2} x^{2} - 1\right )}^{3} \sqrt {-c^{2} x^{2} + 1} b e^{3}}{49 \, c^{7}} + \frac {b e^{3} x \arcsin \left (c x\right )}{7 \, c^{6}} + \frac {3 \, \sqrt {-c^{2} x^{2} + 1} b d e^{2}}{5 \, c^{5}} + \frac {3 \, {\left (c^{2} x^{2} - 1\right )}^{2} \sqrt {-c^{2} x^{2} + 1} b e^{3}}{35 \, c^{7}} - \frac {{\left (-c^{2} x^{2} + 1\right )}^{\frac {3}{2}} b e^{3}}{7 \, c^{7}} + \frac {\sqrt {-c^{2} x^{2} + 1} b e^{3}}{7 \, c^{7}} \]

input
integrate((e*x^2+d)^3*(a+b*arcsin(c*x)),x, algorithm="giac")
 
output
1/7*a*e^3*x^7 + 3/5*a*d*e^2*x^5 + a*d^2*e*x^3 + b*d^3*x*arcsin(c*x) + a*d^ 
3*x + (c^2*x^2 - 1)*b*d^2*e*x*arcsin(c*x)/c^2 + b*d^2*e*x*arcsin(c*x)/c^2 
+ 3/5*(c^2*x^2 - 1)^2*b*d*e^2*x*arcsin(c*x)/c^4 + sqrt(-c^2*x^2 + 1)*b*d^3 
/c + 6/5*(c^2*x^2 - 1)*b*d*e^2*x*arcsin(c*x)/c^4 + 1/7*(c^2*x^2 - 1)^3*b*e 
^3*x*arcsin(c*x)/c^6 - 1/3*(-c^2*x^2 + 1)^(3/2)*b*d^2*e/c^3 + 3/5*b*d*e^2* 
x*arcsin(c*x)/c^4 + 3/7*(c^2*x^2 - 1)^2*b*e^3*x*arcsin(c*x)/c^6 + sqrt(-c^ 
2*x^2 + 1)*b*d^2*e/c^3 + 3/25*(c^2*x^2 - 1)^2*sqrt(-c^2*x^2 + 1)*b*d*e^2/c 
^5 + 3/7*(c^2*x^2 - 1)*b*e^3*x*arcsin(c*x)/c^6 - 2/5*(-c^2*x^2 + 1)^(3/2)* 
b*d*e^2/c^5 + 1/49*(c^2*x^2 - 1)^3*sqrt(-c^2*x^2 + 1)*b*e^3/c^7 + 1/7*b*e^ 
3*x*arcsin(c*x)/c^6 + 3/5*sqrt(-c^2*x^2 + 1)*b*d*e^2/c^5 + 3/35*(c^2*x^2 - 
 1)^2*sqrt(-c^2*x^2 + 1)*b*e^3/c^7 - 1/7*(-c^2*x^2 + 1)^(3/2)*b*e^3/c^7 + 
1/7*sqrt(-c^2*x^2 + 1)*b*e^3/c^7
 
3.7.18.9 Mupad [F(-1)]

Timed out. \[ \int \left (d+e x^2\right )^3 (a+b \arcsin (c x)) \, dx=\int \left (a+b\,\mathrm {asin}\left (c\,x\right )\right )\,{\left (e\,x^2+d\right )}^3 \,d x \]

input
int((a + b*asin(c*x))*(d + e*x^2)^3,x)
 
output
int((a + b*asin(c*x))*(d + e*x^2)^3, x)